(DEFUN C:11111111()
;SET LAYER
(COMMAND "SETVAR" "CMDECHO" 0)



(SETQ P1 (GETPOINT  "\nP1:"))
(SETQ P2 (GETPOINT  "\nP2:"))

(COMMAND "LAYER" "SET" 0 "")
(COMMAND "LINE" P1 P2 "")

prinl)
